home *** CD-ROM | disk | FTP | other *** search
/ Let's Discover North Carolina / Let's Discover North Carolina.iso / pc / FILES / TIME.dxr / 00321_clearVariables.ls < prev    next >
Encoding:
Text File  |  2000-12-01  |  884 b   |  51 lines
  1. global aFull, bFull, cFull, aContains, bContains, cContains, guess1, guess2, guess3
  2.  
  3. on exitFrame me
  4.   aFull = 0
  5.   bFull = 0
  6.   cFull = 0
  7.   guess1 = 0
  8.   guess2 = 0
  9.   guess3 = 0
  10.   aContains = 0
  11.   bContains = 0
  12.   cContains = 0
  13.   puppetSound(3, "ballsejectE")
  14. end
  15.  
  16. on prepareFrame me
  17.   repeat with i = 38 to 49
  18.     sprite(i).visible = 0
  19.   end repeat
  20.   case guess1 of
  21.     0:
  22.       sprite(38).visible = 1
  23.     "A":
  24.       sprite(39).visible = 1
  25.     "B":
  26.       sprite(40).visible = 1
  27.     "C":
  28.       sprite(41).visible = 1
  29.   end case
  30.   case guess2 of
  31.     0:
  32.       sprite(42).visible = 1
  33.     "A":
  34.       sprite(43).visible = 1
  35.     "B":
  36.       sprite(44).visible = 1
  37.     "C":
  38.       sprite(45).visible = 1
  39.   end case
  40.   case guess3 of
  41.     0:
  42.       sprite(46).visible = 1
  43.     "A":
  44.       sprite(47).visible = 1
  45.     "B":
  46.       sprite(48).visible = 1
  47.     "C":
  48.       sprite(49).visible = 1
  49.   end case
  50. end
  51.